COMMENT ⊗   VALID 00003 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	. DEVICE XGP    
C00004 00003	.PAGE←137
C00016 ENDMK
C⊗;
. DEVICE XGP    
.spacing 10*5 mills;
.EVERY HEADING(,{PAGE},)
.AREA TEXT LINES 4 TO 40
.FONT 1 "METL"
.font 2 "METLI"
.font 3 "METS"
.font 4 "MUS[HHA,LCS]"
.font 5 "MUZ[HHA,LCS]"
.FONT 6 "BASL35"
.FONT 7 "MORE[HHA,LCS]"
.FONT 8 "II4[HHA,LCS]"
.PORTION MAIN;
.PLACE TEXT;
.COUNT PAGE FROM 1 TO 999;
.COMPACT
.<< Put in a footnote. >>
.
.COUNT FOOTNOTE INLINE FROM 1 TO 999 IN PAGE PRINTING ⊂"*****"[1 TO FOOTNOTE]⊃
.<<	(IF THISDEVICE = "XGP" THEN "%51%*" ELSE "[1]");>>
.
.FOOTSEP ← "__________";
.AT "$$" ENTRY "$"
.	⊂
.	NEXT FOOTNOTE;
.	FOOTNOTE!;
.	SEND FOOT
.		⊂
.		BEGIN "NEXT FOOTNOTE"
.		SELECT 1;
.		SINGLE SPACE
.		SPACING 0 MILLS
.		INDENT 0,0,0;
.		(FOOTNOTE! & " ");
ENTRY
.		END "NEXT FOOTNOTE";
.		⊃;
.	⊃;
.
.TURN ON "∂%↓_↑↓[&]","α"
.PAGE←137
.next page
.begin verbatim
Example 105b.  Harmonic reduction.

.end
.CENTER
%6⊂⊗⊃L[α%0.00,α%-1.28]:N105B.PLT[c10,LCS]⊂⊗⊃%1
.skip 7
.begin verbatim
Figure 105a

.end
.CENTER
%6⊂⊗⊃L[α%0.00,α%-3.02]:105FA.PLT[c10,LCS]⊂⊗⊃%1
.skip 14
.fill indent 6
	This portrays the basic progression which will be used in the 
final analysis, but the effect of the chromatic inner voice should not
be entirely ignored.  If the notes D%4S%1, E%4S%1, and G (enharmonic
F double-sharp) of 53-55 are taken as functional leading tones, the
analysis shows the same general picture but with more tonicizations.